###
###     h y p o t  Tests
###


hypot <- matlab4r::hypot
identical(hypot(3,4), 5)
identical(hypot(c(0,0), c(3,4)), c(3,4))
